home *** CD-ROM | disk | FTP | other *** search
/ Developer Source 17 / Developer Source Volume 17 (I-MODE Publications, Inc.)(2000).iso / delpp / fig7-16.gif < prev    next >
Graphics Interchange Format  |  1996-11-19  |  36.0 KB  |  640x480  |  4-bit (15 colors)
   ocr: i Delphi 2.0 Boolxor OX File Edit Search View Project Run Component Database Workgroups Tools Help Standard Additional Win95 Dialogs System Data. Access Data Controls - E - A abll OR DE Form3 L JX Ubject inspector X Form3: TForm3 BOOLXORF.PAS -OX Properties Events Boolxorf ActiveControl Memol procedure TForm3.ButtoniClick(Sender: TObject); - AutoScroll True +Borderlcons biSystemMenu, var BorderStyle bsSizeable 1: Boolean; Caption Form3 ClientHeight 273 begin Clientwidth 427 1:= (10 > 0) xor (-1> 0); Color clBtnFace if - 1 then CH3D True Memol.Lines.Add('The result is True.') Cursor crDefault e ...